LDARGS 0
CALL (0, "L1")
STOP
FLabel (0, "L1")
INCSP 1
GETBP
OFFSET 0
ADD
CSTI -5
STI
INCSP -1
GETBP
OFFSET 0
ADD
LDI
PRINTI
INCSP -1
GETBP
OFFSET 0
ADD
DUP
LDI
SWAP
DUP
LDI
CSTI 1
ADD
STI
INCSP -1
INCSP -1
INCSP 0
GOTO "L3"
Label "L2"
GETBP
OFFSET 0
ADD
LDI
PRINTI
INCSP -1
GETBP
OFFSET 0
ADD
DUP
LDI
SWAP
DUP
LDI
CSTI 1
ADD
STI
INCSP -1
INCSP -1
INCSP 0
Label "L3"
GETBP
OFFSET 0
ADD
LDI
CSTI 0
EQ
IFZERO "L2"
Label "L4"
INCSP -1
RET -1